    VB.NET 2005дʱػ           ҳ  ѧԺ       缼  ͼͼ  ϵͳ  ָ    칫  ý嶯  վӪ  ֤  ҳ    web    Ϸ  QQ      ǰλã   򿪷  VB  VB.NET 2005дʱػ     VB.NET 2005дʱػ ڣ2007918 ߣ 鿴:[     С ]       xianzaiTime = TimeOfDay 
If RadioButton1.Checked Then 

If DateDiff(Microsoft.VisualBasic.DateInterval.Second, xianzaiTime, entTime) < 0 Then 'DateDiffжǷʱ 

End If 
End If 

PowerOff() 'رռ 
End Sub 
˻һʱػˣһӰɣȻڸ˵ǷϻǶ˵ҲǱرġӵȻϲ켫Ƶˡ 

ȴһLabelؼɣеϣtextΪ켫Ƶͼ5 

 
Ҫˣ˫Form1 

Public Class Form1¼ 

룺 

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA"(ByVal hwngnd As Integer, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Integer) As Integer 
ͼ6 

 
˫ղӵlabeltext:켫Ƶ´룺 

Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click 
ShellExecute(0, "open", "http://dev.yesky.com ", CStr(0), CStr(0), 1) 

End Sub 
End Class 
OKȫ㶨F5ͼ7ʾѡӦѡرռʱťͿˣڳ򽫰趨ʱرռѡ 

 
ͼ7 
Ĺ vb.net ȫĵ 

رԴ룺 code.rar 
    һҳ   [1]   [2]   [3]   [4]      Ʊҳַͱ⣬͸QQ/Msnĺһ 
 
   VB.NET 2005дʱػ £   VB.NET 2005дʱػ  VB.NET 2005дʱػ   
һƪ: ɱ2008԰  
һƪ: SOAеļܹʦɫ  رվرֹתصר¿תأעԭʼ  .°Ȩԭʼ.ڱվתµĸ˺վǱʾл⡣վת  صаȨϵ༭Ա,ǾԸ. תעԴhttp://www.hackhome.com     ƷƼ  
 ȵTOP10    VB+Accessͼϵͳ    VBʱͱܵ    ؼС洰С仯仯    VBʹDirectXļ̳    VBѧ±ܼӴ    VBݿԴ60ʵ    VBʹEXCEL    180VBͼνԴʵ    VB쳬Ի˵    API޸עģ    ͨſؼMSCommʹ    WINDOWSϢ˵    16תʮ, 16תɶƵ    vsprintӡʵ    webbrowser 2ղأ    VB6DataGridʵͨõӱ    FindWindow    VB6.0ͼ    VB֮·ý    VB̳ ڶ£ؼѧϰ     رƼ    ǳVB.Net Windows Form    ׹Ʊ˰ʼ    VisualBasic 6еĺִ    Զȡû½ƣٽ֤    APIָĿ¼ļ    VBݿԴ60ʵ    VBIEԶ尴ť    VBMS OfficeCOM    Visual Basicװ    WebComputingADOܽᱨ    vsprintӡʵ    VBʵһ򵥵ESMTPͻ    webbrowser 2ղأ    SetForegroundWindow    API޸עģ    VB쳬Ի˵    WINDOWSϢ˵    ؼС洰С仯仯    VBʱͱܵ         | () | Ȩ |  | Ϣ   Copyright 2003-2007  All Rights Reserved.  ICP05018371       